Data Sheet - 21st May 2011
                _____  _      _   _                              
               |  __ \(_)    | | (_)                             
               | |  | |_  ___| |_ _  ___  _ __   __ _ _ __ _   _ 
               | |  | | |/ __| __| |/ _ \| '_ \ / _` | '__| | | |
               | |__| | | (__| |_| | (_) | | | | (_| | |  | |_| |
               |_____/|_|\___|\__|_|\___/|_| |_|\__,_|_|   \__, |
                                                            __/ |
                                                           |___/ 
                                        __          __           _     
            /\                          \ \        / /          | |    
           /  \   ___ ___ ___  ___ ___   \ \  /\  / /__  _ __ __| |___ 
          / /\ \ / __/ __/ _ \/ __/ __|   \ \/  \/ / _ \| '__/ _` / __|
         / ____ \ (_| (_|  __/\__ \__ \    \  /\  / (_) | | | (_| \__ \
        /_/    \_\___\___\___||___/___/     \/  \/ \___/|_|  \__,_|___/
                                                                       
The following words are designed to give one access to the pertinent areas of a 
Word in the dictionary:

    * LFA (link field address)
    * NFA (name field address)
    * CFA (code field address (sometimes called the XT (execution token))
    * PFA (parameter field address)
    
These words remove the requirement for 'carnal knowledge' of the dictionary 
structure used in TurboForth, allowing standard compliant programs to be written
that should run on other F83 compliant platforms.

Programs that need to work with the dictionary structure of TF words should use
the words below. By doing so, it will be extremely simple to modify ones program
in the event of a change to the dictionary structure in TurboForth (very
unlikely).

: >NAME ( cfa -- nfa ) 
    >DFA 4 + ;
  
: >LINK ( cfa -- lfa )
    >DFA ;
  
: BODY> ( pfa -- cfa )
    4 - ;
  
: NAME> ( nfa -- cfa )
    DUP 2- @ $F AND + 1+ $FFFE AND ;
  
: LINK> ( lfa -- cfa )
    4 + NAME> ;
  
: N>LINK ( nfa -- lfa )
    4 - ;
  
: L>NAME ( lfa -- nfa )
    4 + ;

Note that the word >LINK simply uses the ROM resident word >DFA (to dictionary 
field address). Please note that >DFA will be renamed to >LINK in V1.1 as the 
use of >LINK is more standard.